Event OnConnect() # Player event
$NickName = GetCurrentPlayerVar("NickName");
$Posabs = GetCurrentPlayerVar("Posabs");
$Groupqual = GetCurrentPlayerVar("Groupqual");
openPrivButton( "welc",25,50,150,15,12,-1,0, langEngine("%{main_welc1}%", $NickName ) );
openPrivButton( "pos",25,80,150,10,8,-1,0,langEngine("%{main_welc2}%",$Posabs,$Posqual,$Groupqual ) );
http("[URL]http://www.frh-team.net/reglapper/getserver2.php[/URL]" );
[COLOR=red]DelayedCommand( 10, OSB ); #10 sec delay and jump to OSB[/COLOR]
EndEvent
[COLOR=red]Sub OSB () #Show the buttons[/COLOR]
[COLOR=red]openPrivButton( "clos",78,120,20,10,10,-1,32,langEngine("%{main_accept}%"),OnConnectClose );[/COLOR]
[COLOR=red]openPrivButton( "ref",103,120,20,10,10,-1,32,langEngine("%{main_deny}%"),OnConnectCloseKick );[/COLOR]
[COLOR=red]EndSub[/COLOR]
Sub OnConnectClose( $KeyFlags,$id )
closePrivButton("welc&pos&clos&ref");
IF ( $enable_pitboard == "true" )
THEN
OnConnectClose_Pitboard();
ENDIF
EndSub
Sub OnConnectCloseKick( $KeyFlags,$id )
closePrivButton("welc&pos&clos&ref");
cmdLFS("/kick " . GetCurrentPlayerVar("UserName") );
EndSub
CASE "!laser":
IF ( UserInGroup( "Police_O",$userName ) == 1 )
THEN
IF GetPlayerVar( $argv,"CurrNode" ) >= GetCurrentPlayerVar( "CurrNode" )-1 && GetPlayerVar( $argv,"CurrNode" ) <= GetCurrentPlayerVar( "CurrNode" )+1
THEN
privMsg( $argv . " driving " . ToPlayerUnit( GetCurrentPlayerVar( "InstantSpeed" ) ),GetCurrentPlayerVar("UnitSpeed") );
ELSE
privMsg( "To far for Laser gun" );
ENDIF
ENDIF
BREAK;
CatchEvent OnNewPlayerJoin( $userName ) # Player event
IF ( $LockState == "locked" )
THEN
cmdLFS( "/spec " . [COLOR="Red"]$userName[/COLOR] );
ENDIF
BREAK;
EndCatchEvent
<?php
CASE "!glow":
IF( UserInGroup( "admin",$userName ) == 1 )
THEN
$temp = GetListOfPlayers( );
FOREACH( $maVar IN $temp )
IF( UserInGroup( "admin",$maVar["value"] ) == 1 )
THEN
PrivMsg($maVar["value"],"^1Glow: ^7".$argv);
ENDIF
ENDFOREACH
ELSE
privMsg( "You are not an Admin!");
ENDIF
BREAK;
?>
<?php
CASE "!ban":
IF( $argv != "" )
THEN
$idxSpace = indexOf( $argv, ",");
IF( $idxSpace != -1 )
THEN
$banUser = subStr( $argv,0,$idxSpace );
$days = trim( subStr( $argv,$idxSpace +1 ));
globalMsg( "^1User ^7" . $banUser . " ^1has been banned by ^7" . GetPlayerVar($userName, "NickName") );
cmdLFS( "/ban " . $banUser . " " . $days);
ELSE
privMsg ( "^3Use !ban username,days" );
ENDIF
ELSE
privMsg ( "^3Use !ban username,days" );
ENDIF
BREAK;
CASE "!unban":
IF( $argv != "" )
THEN
globalMsg( "^2User ^7" . $argv . " ^2has been unbanned by ^7" . GetPlayerVar($userName, "NickName") );
cmdLFS( "/unban " . $argv );
ELSE
privMsg ( "^3Use !unban username" );
ENDIF
BREAK;
?>
<?php
CASE "!red":
$NickName = GetCurrentPlayerVar("NickName");
$NickStrip = StripLFSColor( ToLower($NickName));
$IdxOfTag = IndexOf( $NickStrip , "[r]");
IF( $IdxOfTag!= -1 )
THEN
IF( $argv != "" )
THEN
$temp = GetListOfPlayers( );
FOREACH( $maVar IN $temp )
$NickName = GetPlayerVar($maVar["value"], "NickName");
$NickStrip = StripLFSColor( ToLower($NickName) );
$IdxOfTag = indexOf( $NickStrip , "[r]");
IF( $IdxOfTag != -1 )
THEN
$argv1 = substr( $argv,0,30 );
IF( strlen($argv) > 30 )
THEN
$argv2 = substr( $argv,30,strlen($argv) );
ENDIF
IF( $argv2 != "" )
THEN
IF( strlen($argv2) > 30 )
THEN
$argv3 = substr( $argv,strlen($argv2),strlen($argv) );
ENDIF
ENDIF
PrivMsg( $maVar["value"], "^1[r] " . GetCurrentPlayerVar( "UserName" ) . " ^8: ^2" . $argv1 );
IF( $argv2 != "" )
THEN
PrivMsg( $maVar["value"], "^1[r] " . GetCurrentPlayerVar( "UserName" ) . " ^8: ^2" . $argv2 );
ENDIF
IF( $argv3 != "" )
THEN
PrivMsg( $maVar["value"], "^1[r] " . GetCurrentPlayerVar( "UserName" ) . " ^8: ^2" . $argv3 );
ENDIF
ENDIF
ENDFOREACH
ENDIF
ENDIF
BREAK;
?>
<?php
!ban1
globalMsg( "^1User ^7" . $argv . " ^1has been banned by " . GetPlayerVar($userName, "NickName") );
cmdLFS( "/ban " . $argv . " 1" );
!ban30
globalMsg( "^1User ^7" . $argv . " ^1has been banned by " . GetPlayerVar($userName, "NickName") );
cmdLFS( "/ban " . $argv . " 30" );
?>
<?php
CASE "!red":
$NickName = GetCurrentPlayerVar("NickName");
$NickStrip = StripLFSColor( ToLower($NickName))
$IdxOfTag = indexOf( $NickStrip , "[r]");
IF( $IdxOfTag!= -1 )
THEN
IF( $argv != "" )
THEN
$temp = GetListOfPlayers( );
FOREACH( $maVar IN $temp )
$NickName = GetPlayerVar($maVar["value"], "NickName");
$NickStrip = StripLFSColor( ToLower($NickName) );
$IdxOfTag = indexOf( $NickStrip , "[r]");
IF( $IdxOfTag != -1 )
THEN
privMsg ($maVar["value"],"^1Red:");
privMsg ($maVar["value"],$argv);
ENDIF
ENDFOREACH
ENDIF
ENDIF
BREAK;
?>